Year 51 - Identify Yourselves

-- 7 Billion Humans (2145) --
-- 51: Identify Yourselves by @commonnickname --

if w == nothing or
 e == nothing:
	if w == nothing:
		step se
		step s
		pickup nw
		write 1
		step nw
	else:
		step sw
		step s
		pickup ne
		write 10
		step ne
	endif
else:
	pickup s
	if s == worker or
	 sw == worker or
	 se == worker:
		step s
		if s == worker:
			if e == worker:
				write 2
			else:
				write 9
			endif
		else:
			if sw == worker:
				write 3
			else:
				write 8
			endif
		endif
	else:
		if sw == worker or
		 se == worker:
			step s
			if e == nothing:
				write 4
			else:
				write 7
			endif
		else:
			if e == worker:
				step s
				write 5
			else:
				step s
				write 6
			endif
		endif
	endif
endif
drop